home *** CD-ROM | disk | FTP | other *** search
/ kermit.columbia.edu / kermit.columbia.edu.tar / kermit.columbia.edu / newsgroups / misc.19981211-19990422 / 000447_news@watsun.cc.columbia.edu _Mon Apr 19 14:22:13 1999.msg < prev    next >
Internet Message Format  |  1999-04-21  |  6KB
  1. Return-Path: <news@watsun.cc.columbia.edu>
  2. Received: from newsmaster.cc.columbia.edu (newsmaster.cc.columbia.edu [128.59.59.30])
  3.     by watsun.cc.columbia.edu (8.8.5/8.8.5) with ESMTP id OAA03902
  4.     for <kermit.misc@watsun.cc.columbia.edu>; Mon, 19 Apr 1999 14:22:12 -0400 (EDT)
  5. Received: (from news@localhost)
  6.     by newsmaster.cc.columbia.edu (8.8.5/8.8.5) id OAA13809
  7.     for kermit.misc@watsun.cc.columbia.edu; Mon, 19 Apr 1999 14:04:24 -0400 (EDT)
  8. X-Authentication-Warning: newsmaster.cc.columbia.edu: news set sender to <news> using -f
  9. From: fdc@watsun.cc.columbia.edu (Frank da Cruz)
  10. Subject: Re: Help on shell script doing ftp
  11. Date: 19 Apr 1999 18:04:19 GMT
  12. Organization: Columbia University
  13. Message-ID: <7ffr73$dfe$1@newsmaster.cc.columbia.edu>
  14. To: kermit.misc@watsun.cc.columbia.edu
  15.  
  16. In article <7ff65g$f9d$1@news1.global-one.dk>,
  17. Jan Fjeldmark <jfj.it@dsg.dk> wrote:
  18. : Stefan A. Deutscher wrote:
  19. : >On Fri, 9 Apr 1999 19:05:20 -0500, steve VanArsdale
  20. : ><first.consultant@picksys.com> wrote:
  21. : >>i am looking for a workaround for ftp in an batch AIX shell script.
  22. : >>
  23. : >>Specifically, we need the script to open an ftp session to a remote AIX
  24. : >>system with both the login and the password, check for the existence of
  25. : >>a file, and if not present, put the file on the remote directory. If
  26. : >>the file is present on the remote directory the script must record an
  27. : >>error and exit without putting the file.
  28. : >>
  29. : >>ftp always prompts for the password, and we can't figure out how to
  30. : >>make the script conditional on the presence of the file in the remote
  31. : >>directory.
  32. : >
  33. : >Unless it _has_ to be ftp/ftpd you could try a small kermit script.
  34. : >That's at least what I'd do. Cheer,  Stefan
  35. : 
  36. : Like telnet, ftp uses .netrc to login to foreign hosts. Put this line in
  37. : .netrc:
  38. : 
  39. : machine myhost login myname password mypw
  40. : 
  41. : Now ftp won't prompt for userid or password.
  42. : 
  43. : To test for presence of a specific file on the remote host and act
  44. : correspondingly, you wil have to run ftp several times and analyse the out
  45. : using grep or similar.
  46. : 
  47. Or as Stephan suggests, you can use Kermit instead of FTP.
  48.  
  49. : >>Specifically, we need the script to open an ftp session to a remote AIX
  50. : >>system with both the login and the password, check for the existence of
  51. : >>a file, and if not present, put the file on the remote directory. If
  52. : >>the file is present on the remote directory the script must record an
  53. : >>error and exit without putting the file.
  54. :
  55. Here's an illustration using C-Kermit 7.0 Beta.06:
  56.  
  57.   http://www.columbia.edu/kermit/ck70.html
  58.  
  59. --(cut here)--
  60. #/usr/local/bin/kermit +
  61.  
  62. define fatal { hangup, exit 1 \%1 }
  63.  
  64. set network type tcp/ip
  65. if fail exit 1 { Sorry, this version of C-Kermit does not support TCP/IP.}
  66.  
  67. while not def \%1 {            ; If hostname/address not supplied
  68.     ask \%1 { Host: }          ; prompt for one until we get it.
  69.     if > \fsplit(\%1) 1 {      ; Allow only one "word" here.
  70.         echo Just the address please.  ; E.g. no TCP port number.
  71.         undef \%1
  72.     }
  73. }
  74. if not def \%2 {                       ; If username not supplied
  75.     ask \%2 { User [\v(user)]: }       ; Prompt for one, but default
  76.     if not def \%2 assign \%2 \v(user) ; to local user ID.
  77. }
  78. echo Connecting to \%1 as user \%2...
  79.  
  80. set host \%1 23
  81. if fail exit 1 Can't open Telnet connection to \%1.
  82.  
  83. ; Prompt for password if necessary only after connection is made
  84. ; (because there's no point in asking for it if the connection failed).
  85.  
  86. while not defined \%3 {
  87.     askq \%3 { Password for \%2 at \%1: }
  88. }
  89. set input echo off             ; Don't echo scripted interactions.
  90.  
  91. ; Get any of several possible login prompts:
  92.  
  93. minput 20 login: Username: Password: {Password for \%2:}
  94. if fail exit 1 Timed out waiting for initial prompt: \v(inwait) sec.
  95. if ( = \v(minput) 1 || = \v(minput) 2 ) {
  96.     lineout \%2                ; User ID required - send it.
  97.     minput 10 Password: {Password for \%2:}
  98.     if fail exit 1 Timed out waiting for Password prompt: \v(inwait) sec.
  99. }
  100. lineout \%3                    ; Send password
  101. undef \%3                      ; Erase password from memory
  102. set exit on-disconnect on      ; Exit automatically if connection broken.
  103.  
  104. ; Start Kermit server on the remote end
  105. ;
  106. lineout kermit -x
  107.  
  108. ; From this point all commands are issued from the client.
  109. ;
  110. ; Let's say the directory in question is /tmp/test
  111. ; and the filename is foo.  Of course you could use variables here.
  112. ;
  113. log transactions               ; Keep a record of file transfers
  114.  
  115. remote cd /tmp/test
  116. if fail fatal {Can't CD to /tmp/test}
  117.  
  118. remote query files(foo)
  119. if = \v(query) 0 {
  120.     writeln transactions File "foo" already exists on server.
  121.     echo File "foo" already exists on server - quitting...
  122.     exit 0
  123. }
  124. send foo
  125. if fail fatal {Upload failed}
  126. bye
  127. exit 0 Upload succeeded
  128. ---(cut here)---
  129.  
  130. Save this file under whatever name you want, give it execute permission,
  131. and then run it as if it were a shell script.  The host, username, and
  132. password can be given as arguments on the command line; if they are not
  133. given, the script prompts you for them.
  134.  
  135. You can simplify the upload part considerably by telling the server to
  136. "set file collision discard" -- meaning if the client tries to send it a
  137. file whose name is the same as a file already present at the server, the
  138. server rejects it.  Other options include "set file collision update",
  139. meaning to accept the incoming file only if it is newer than the existing one.
  140.  
  141. - Frank